home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 November: Tool Chest / Dev.CD Nov 00 TC Disk 1.toast / Sample Code / Graphics 3D / SetupGL / SetupGL Main.c < prev    next >
Encoding:
Text File  |  2000-09-28  |  19.9 KB  |  699 lines  |  [TEXT/CWIE]
  1. /*
  2.     File:        SetupGL Main.c
  3.  
  4.     Contains:    An example of the use of the SeupGL utility code.  This sample builds a context and lets the user control
  5.                 the specifications on the fly, rebuilding the context when the request changes.  Controls are:
  6.                 
  7.                 Left/right arrows: smaller or larger resolution context
  8.                 
  9.                 Up/down arrows: 32/16 bit pixel depth toggle
  10.                 
  11.                 left/right bracket: chnage requested screen down or up one
  12.                 
  13.                 w: go to windowed mode
  14.                 
  15.                 f: go to fullscreen mode            
  16.  
  17.     Written by:    Geoff Stahl
  18.  
  19.     Copyright:    1999 Apple Computer, Inc., All Rights Reserved
  20.  
  21.     Change History (most recent first):
  22.  
  23.  
  24.     Disclaimer:    IMPORTANT:  This Apple software is supplied to you by Apple Computer, Inc.
  25.                 ("Apple") in consideration of your agreement to the following terms, and your
  26.                 use, installation, modification or redistribution of this Apple software
  27.                 constitutes acceptance of these terms.  If you do not agree with these terms,
  28.                 please do not use, install, modify or redistribute this Apple software.
  29.  
  30.                 In consideration of your agreement to abide by the following terms, and subject
  31.                 to these terms, Apple grants you a personal, non-exclusive license, under Apple’s
  32.                 copyrights in this original Apple software (the "Apple Software"), to use,
  33.                 reproduce, modify and redistribute the Apple Software, with or without
  34.                 modifications, in source and/or binary forms; provided that if you redistribute
  35.                 the Apple Software in its entirety and without modifications, you must retain
  36.                 this notice and the following text and disclaimers in all such redistributions of
  37.                 the Apple Software.  Neither the name, trademarks, service marks or logos of
  38.                 Apple Computer, Inc. may be used to endorse or promote products derived from the
  39.                 Apple Software without specific prior written permission from Apple.  Except as
  40.                 expressly stated in this notice, no other rights or licenses, express or implied,
  41.                 are granted by Apple herein, including but not limited to any patent rights that
  42.                 may be infringed by your derivative works or by other works in which the Apple
  43.                 Software may be incorporated.
  44.  
  45.                 The Apple Software is provided by Apple on an "AS IS" basis.  APPLE MAKES NO
  46.                 WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED
  47.                 WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  48.                 PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN
  49.                 COMBINATION WITH YOUR PRODUCTS.
  50.  
  51.                 IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR
  52.                 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  53.                 GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  54.                 ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION
  55.                 OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT
  56.                 (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN
  57.                 ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  58.     
  59.          <7>     3/21/00    ggs     Removed grey region call from drag, not needed
  60.          <6>     1/26/00    ggs     Add preflight support, handle failure conditions throughout app
  61.                                     better
  62.          <5>     1/24/00    ggs     fixed Apple menu selection, fixed aglfont texture row length
  63.                                     problem, fixed suspend/resume, fixed update
  64.          <4>    12/18/99    ggs     Fix headers
  65.          <3>    12/18/99    ggs     Added window/fullscreen toggle support and error window
  66.          <2>    11/28/99    ggs     Standard toolbox application
  67.          <1>    11/28/99    ggs     Initial Add
  68.          <6>     9/14/99    GGS        Corrected buffer rect handling and cleaned up code
  69.          <5>     7/14/99    GGS        Fixed multi-monitor window centering
  70.          <4>     7/13/99    GGS        Add work around for over zealous checking in single buffer DSp context attributes
  71.          <3>     7/5/99     GGS        Now correctly handle multi-monitor (DSp front buffer for single device; Window on top of context for multiple devices)
  72.          <2>     5/28/99    GGS     Added better multi-monitor support, clean code, corrected blanking bug, added timing, correct pixel formats
  73.          <1>        ?        ?      Initial build
  74. */
  75.  
  76.  
  77. // system includes ----------------------------------------------------------
  78.  
  79. #include <Devices.h>
  80. #include <Dialogs.h>
  81. #include <DriverServices.h>
  82. #include <Events.h>
  83. #include <LowMem.h>
  84. #include <TextEdit.h>
  85. #include <ToolUtils.h>
  86. #include <Windows.h>
  87.  
  88. #include <math.h>
  89. #include <stdio.h>
  90. #include <string.h>
  91.  
  92. #include <gl.h>
  93.  
  94. // project includes ---------------------------------------------------------
  95.  
  96. #include "SetupGL.h"
  97.  
  98. // prototypes ---------------------------------------------------------------
  99.  
  100. void InitToolbox(void);
  101. Boolean SetUp (void);
  102. void DoMenu (SInt32 menuResult);
  103. void DoKey (SInt8 theKey, SInt8 theCode);
  104. void DoUpdate (void);
  105. void DoEvent (void);
  106. void CleanUp (void);
  107.  
  108. void drawGL(AGLContext aglContext, pstructGLInfo pglInfo);
  109.  
  110. void DrawFrameRate (GLuint fontList);
  111. void DrawContextInfo (GLuint fontList);
  112.  
  113. void DrawPSringGL (Str255 pstrOut, GLuint fontList);
  114. void DrawCSringGL (char * cstrOut, GLuint fontList);
  115. GLuint BuildFontGL (AGLContext ctx, GLint fontID, Style face, GLint size);
  116. void DeleteFontGL (GLuint fontList);
  117.  
  118.  
  119. // statics/globals (internal only) ------------------------------------------
  120.  
  121. // Menu defs
  122. enum 
  123. {
  124.     kNumRes = 10,
  125.     kNumFreqs = 11,
  126.  
  127.     kMenuApple = 128,
  128.     kMenuFile = 129,
  129.     
  130.     kAppleAbout = 1,
  131.     kFileQuit = 1
  132. };
  133.  
  134. enum 
  135. {
  136.     kForegroundSleep = 0,
  137.     kBackgroundSleep = 32000
  138. };
  139.  
  140. const RGBColor    rgbWhite    = { 0xFFFF, 0xFFFF, 0xFFFF };
  141.  
  142. SInt32 gSleepTime = kForegroundSleep;
  143. Boolean gDone = false, gfFrontProcess = true;
  144.  
  145. Point gapntResolution [kNumRes] = {{300, 400}, {384, 512}, {480, 640}, {600, 800}, {624, 832}, {768, 1024}, {870, 1152}, {1024, 1280}, {1200, 1600}, {1440, 1920}};
  146. short gResCurrent = 2;
  147. long gaFreq [kNumFreqs] = {56, 60, 65, 67, 72, 75, 76, 85, 90, 100, 120};
  148. short gFreqCurrent = 7;
  149. short gNumDevice = 0;
  150. char gstrMode [256] = "";
  151.  
  152. structGLInfo glInfo;
  153. AGLDrawable aglDraw = 0;
  154. AGLContext aglContext = 0;
  155. DSpContextReference dspContext = 0;
  156. GLuint gFontList = 0;
  157.  
  158. WindowPtr gpWindowError = NULL;
  159.  
  160.  
  161. // functions (internal/private) ---------------------------------------------
  162.  
  163. void InitToolbox(void)
  164. {
  165.     MenuHandle menu;
  166.  
  167.     MaxApplZone ();
  168.  
  169.     InitGraf((Ptr) &qd.thePort);
  170.     InitFonts();
  171.     InitWindows();
  172.     InitMenus();
  173.     TEInit();
  174.     InitDialogs(nil);
  175.     InitCursor();
  176.     
  177.     qd.randSeed =  TickCount();
  178.  
  179.     // Init Menus
  180.     menu = NewMenu (kMenuApple, "\p\024");            // new  apple menu
  181.     InsertMenu (menu, 0);                            // add menu to end
  182.     AppendResMenu(menu, 'DRVR');
  183.     
  184.     menu = NewMenu (kMenuFile, "\pFile");            // new menu
  185.     InsertMenu (menu, 0);                            // add menu to end
  186.     AppendMenu (menu, "\pQuit/Q");                     // add items
  187.     
  188.     DrawMenuBar();
  189. } 
  190.  
  191. // --------------------------------------------------------------------------
  192.  
  193. Boolean SetUp (void)
  194. {
  195.     short i;
  196.     short fNum;
  197.  
  198.     InitToolbox ();
  199.     
  200.     // we want a context and a drawable    
  201.     gNumDevice = 0; // main device (1 = next device, etc.)
  202.     memset(&glInfo, 0, sizeof glInfo);
  203.     glInfo.width = gapntResolution [gResCurrent].h; // width of drawable (screen width in full screen mode)
  204.     glInfo.height = gapntResolution [gResCurrent].v; // height of drawable (screen height in full screen mode)
  205.     glInfo.fSizeMust = false;            // dspContext must be requested height (ignored in window mode)
  206.                                         // Note: This basically determines whether or not displays will step down to allocate or fail
  207.     glInfo.pixelDepth = 16;                // requested pixel depth
  208.     glInfo.fDepthMust = false;            // pixel depth must be set (if false then curretn depth will be used if able)
  209.     glInfo.fFullscreen = true;            // use DSp to get fullscreen?
  210.     glInfo.fAcceleratedMust = true;     // must renderer be accelerated?
  211.     glInfo.VRAM = 0 * 1048576;            // minimum VRAM (if not zero this is always required)
  212.     glInfo.textureRAM = 0 * 1048576;    // minimum texture RAM (if not zero this is always required)
  213.     glInfo.freq = gaFreq [gFreqCurrent]; // desired vertical refresh frquency in Hz (0 = any)
  214.     glInfo.fmt = 0;                        // output pixel format
  215.     
  216.     i = 0;
  217.     glInfo.aglAttributes [i++] = AGL_RGBA;
  218.     glInfo.aglAttributes [i++] = AGL_DOUBLEBUFFER;
  219.     glInfo.aglAttributes [i++] = AGL_NO_RECOVERY;
  220.     glInfo.aglAttributes [i++] = AGL_ACCELERATED;
  221.     glInfo.aglAttributes [i++] = AGL_DEPTH_SIZE;
  222.     glInfo.aglAttributes [i++] = 16;
  223.     glInfo.aglAttributes [i++] = AGL_ALL_RENDERERS;
  224.     glInfo.aglAttributes [i++] = AGL_NONE;
  225.     
  226.     if (PreflightGL (glInfo.fFullscreen))
  227.     {
  228.         BuildGL (&aglDraw, &aglContext, &dspContext, &gNumDevice, &glInfo);
  229.         if (!aglDraw || !aglContext)
  230.             DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  231.     }
  232.         
  233.     if (!aglDraw || !aglContext)
  234.     {
  235.         Rect rectWin = {100, 100, 200, 400};
  236.         gpWindowError = (WindowPtr) NewCWindow (NULL, &rectWin, "\p", 0, kWindowFloatProc, (WindowPtr)-1, 0, 0);
  237.         ShowWindow ((GrafPtr)gpWindowError);
  238.     }
  239.     else
  240.     {    
  241.         GetFNum("\pMonaco", &fNum);                                    // build font
  242.         gFontList = BuildFontGL (aglContext, fNum, normal, 9);
  243.         // set mode string
  244.         sprintf (gstrMode, "%d: %d x %d x %d (%d Hz)", gNumDevice, glInfo.width, glInfo.height, glInfo.pixelDepth, glInfo.freq);
  245.     }
  246.     return true;
  247. }
  248.  
  249. // --------------------------------------------------------------------------
  250.  
  251. void DoMenu (SInt32 menuResult)
  252. {
  253.     SInt16 theMenu;
  254.     SInt16 theItem;
  255.     Str255 daName;
  256.     MenuRef theMenuHandle;
  257.         
  258.     theMenu = HiWord(menuResult);
  259.     theItem = LoWord(menuResult);
  260.     theMenuHandle = GetMenuHandle(theMenu);
  261.  
  262.     switch (theMenu)
  263.     {
  264.         case kMenuApple:
  265.             switch (theItem)
  266.             {
  267.                 case kAppleAbout:
  268.                     break;
  269.                 default:
  270.                     GetMenuItemText (theMenuHandle, theItem, daName);
  271.                     OpenDeskAcc(daName);
  272.                     break;
  273.             }
  274.             break;
  275.         case kMenuFile:
  276.             switch (theItem)
  277.             {
  278.                 case kFileQuit:
  279.                     gDone = true;
  280.                     break;
  281.             }
  282.             break;
  283.     }
  284.     HiliteMenu(0);
  285.     DrawMenuBar();
  286. }
  287.  
  288. // --------------------------------------------------------------------------
  289.  
  290. void DoKey (SInt8 theKey, SInt8 theCode)
  291. {
  292.     #pragma unused (theCode)
  293.     // up and down arrows change bit depth (stop at top and bottom)
  294.     // right and left arrows change size (stop at top and bottom)
  295.     // +(=) and - change frequency request
  296.     // [ and ] cnage requested display device
  297.     
  298.     short fNum;
  299.     
  300.     // resolution
  301.     if (theKey == '\35')
  302.     {
  303.         
  304.         if (++gResCurrent == kNumRes)
  305.             gResCurrent = 0;
  306.         glInfo.width = gapntResolution [gResCurrent].h;
  307.         glInfo.height = gapntResolution [gResCurrent].v;
  308.     }
  309.     else if (theKey == '\34')
  310.     {
  311.         if (--gResCurrent < 0)
  312.             gResCurrent = (short) (kNumRes - 1);
  313.         glInfo.width = gapntResolution [gResCurrent].h;
  314.         glInfo.height = gapntResolution [gResCurrent].v;
  315.     }
  316.     
  317.     // pixel depth
  318.     if (theKey == '\36')
  319.     {
  320.         glInfo.pixelDepth = 32;
  321.     }
  322.     else if (theKey == '\37')
  323.     {
  324.         glInfo.pixelDepth = 16;
  325.     }
  326.     
  327.     // frequency
  328.     if (theKey == '=')
  329.     {
  330.         
  331.         if (++gFreqCurrent == kNumFreqs)
  332.             gFreqCurrent = 0;
  333.         glInfo.freq = gaFreq [gFreqCurrent];
  334.     }
  335.     else if (theKey == '-')
  336.     {
  337.         if (--gFreqCurrent < 0)
  338.             gFreqCurrent = (short) (kNumFreqs - 1);
  339.         glInfo.freq = gaFreq [gFreqCurrent];
  340.     }
  341.     
  342.     // device 
  343.     if (theKey == ']')
  344.         gNumDevice++;
  345.     else if (theKey == '[')
  346.         gNumDevice--;
  347.     
  348.     // device 
  349.     if (theKey == 'w')
  350.         glInfo.fFullscreen = false;
  351.     else if (theKey == 'f')
  352.         glInfo.fFullscreen = true;
  353.     
  354.     glInfo.fSizeMust = false;            // dspContext must be requested height (ignored in window mode)
  355.     glInfo.fDepthMust = false;            // pixel depth must be set (if false then curretn depth will be used if able)
  356.     glInfo.fAcceleratedMust = true;     // must renderer be accelerated?
  357.     glInfo.VRAM = 0 * 1048576;            // minimum VRAM (if not zero this is always required)
  358.     glInfo.textureRAM = 0 * 1048576;    // minimum texture RAM (if not zero this is always required)
  359.  
  360.     // rebuild GL
  361.     if (gpWindowError)
  362.     {
  363.         DisposeWindow ((WindowPtr)gpWindowError);
  364.         gpWindowError = NULL;
  365.     }
  366.  
  367.     DeleteFontGL (gFontList);
  368.     DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  369.     {
  370.         EventRecord theEvent;
  371.         while (WaitNextEvent(everyEvent, &theEvent, gSleepTime, NULL))    // get all the event to ensure icons are not moved
  372.         {}
  373.     }
  374.     
  375.     if (PreflightGL (glInfo.fFullscreen))
  376.     {
  377.         BuildGL (&aglDraw, &aglContext, &dspContext, &gNumDevice, &glInfo);
  378.         if (!aglDraw || !aglContext)
  379.             DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  380.     }
  381.         
  382.     if (!aglDraw || !aglContext)
  383.     {
  384.         Rect rectWin = {100, 100, 200, 400};
  385.         gpWindowError = (WindowPtr) NewCWindow (NULL, &rectWin, "\p", 0, kWindowFloatProc, (WindowPtr)-1, 0, 0);
  386.         ShowWindow ((GrafPtr)gpWindowError);
  387.     }
  388.     else
  389.     {    
  390.         GetFNum("\pMonaco", &fNum);                                    // build font
  391.         gFontList = BuildFontGL (aglContext, fNum, normal, 9);
  392.         // set mode string
  393.         sprintf (gstrMode, "%d: %d x %d x %d (%d Hz)", gNumDevice, glInfo.width, glInfo.height, glInfo.pixelDepth, glInfo.freq);
  394.     }
  395.     DoUpdate ();
  396. }
  397.  
  398. // --------------------------------------------------------------------------
  399.  
  400. void DoUpdate (void)
  401. {
  402.     if (aglDraw && aglContext)
  403.         drawGL (aglContext, &glInfo);
  404.     else
  405.     {
  406.         GrafPtr gpSave;
  407.         GetPort (&gpSave);
  408.         SetPort (gpWindowError);
  409.         MoveTo (10, 20);
  410.         DrawString ("\pBuildGL failed.");
  411.         SetPort (gpSave);
  412.     }
  413. }
  414.  
  415. // --------------------------------------------------------------------------
  416.  
  417. void DoEvent (void)
  418. {
  419.     EventRecord theEvent;
  420.     Rect rectGrow;
  421.     SInt32 menuResult;
  422.     WindowRef whichWindow;
  423.     GrafPtr pGrafSave;
  424.     long grow;
  425.     SInt16 whatPart;
  426.     SInt8 theKey;
  427.     SInt8 theCode;
  428.     Boolean fProcessed = false;
  429.     
  430.     if (WaitNextEvent(everyEvent, &theEvent, gSleepTime, NULL))
  431.     {
  432.         if (dspContext)
  433.             DSpProcessEvent (&theEvent, &fProcessed);
  434.         if (!fProcessed)
  435.         {
  436.             switch (theEvent.what)
  437.             {
  438.                 case mouseDown:
  439.                     whatPart = FindWindow(theEvent.where, &whichWindow);
  440.                     switch (whatPart)
  441.                     {
  442.                         case inGoAway:
  443.                             break;
  444.                         case inMenuBar:
  445.                             DrawMenuBar();
  446.                             menuResult = MenuSelect(theEvent.where);
  447.                             if (HiWord(menuResult) != 0)
  448.                                 DoMenu(menuResult);
  449.                             break;
  450.                         case inDrag:
  451.                             DragWindow (whichWindow, theEvent.where, NULL);
  452.                             break;
  453.                         case inGrow:
  454.                             SetRect (&rectGrow, 100, 100, 20000, 20000);
  455.                             grow = GrowWindow (whichWindow, theEvent.where, &rectGrow);
  456.                             if (grow)
  457.                             {
  458.                                 SizeWindow (whichWindow, grow & 0x0000FFFF, grow >> 16, true);
  459.                                 // do content stuff here
  460.                                 SetPort (whichWindow);
  461.                                 InvalRect (&whichWindow->portRect);                // redraw all
  462.                             }
  463.                             break;
  464.                         case inSysWindow:
  465.                             SystemClick(&theEvent, whichWindow);
  466.                             break;
  467.                     }
  468.                     break;
  469.                 case keyDown:
  470.                 case autoKey:
  471.                     theKey = theEvent.message & charCodeMask;
  472.                     theCode = (theEvent.message & keyCodeMask) >> 8;
  473.                     if ((theEvent.modifiers & cmdKey) != 0)
  474.                     {
  475.                         menuResult = MenuKey(theKey);
  476.                         if (HiWord(menuResult) != 0)
  477.                             DoMenu (menuResult);
  478.                     }
  479.                     else
  480.                         DoKey (theKey, theCode);
  481.                     break;
  482.                 case updateEvt:
  483.                     whichWindow = (WindowRef) theEvent.message;
  484.                     GetPort (&pGrafSave);
  485.                     SetPort ((GrafPtr) whichWindow);
  486.                     BeginUpdate(whichWindow);
  487.                     if ((CGrafPtr) whichWindow == aglDraw)
  488.                         DoUpdate();
  489.                     SetPort ((GrafPtr) whichWindow);
  490.                     EndUpdate(whichWindow);
  491.                     SetPort (pGrafSave);
  492.                     break;
  493.                 case diskEvt:
  494.                     break;
  495.                 case osEvt:
  496.                     if (theEvent.message & 0x01000000)        //    Suspend/resume event
  497.                     {
  498.                         if (theEvent.message & 0x00000001)    //    Resume
  499.                         {
  500.                             
  501.                             gSleepTime = kForegroundSleep;
  502.                             if (aglDraw && aglContext)
  503.                             {
  504.                                 HideCursor ();
  505.                                 ShowWindow ((WindowPtr) aglDraw);
  506.                                 SelectWindow ((WindowPtr) aglDraw);
  507.                                 ResumeGL (aglDraw, aglContext);
  508.                             }
  509.                             DoUpdate ();
  510.                             gfFrontProcess = true;
  511.                         }
  512.                         else
  513.                         {
  514.                             gSleepTime = kBackgroundSleep;    //    Suspend
  515.                             if (aglDraw && aglContext)
  516.                             {
  517.                                 PauseGL (aglContext);
  518.                                 HideWindow ((WindowPtr) aglDraw);
  519.                                 ShowCursor ();
  520.                             }
  521.                             gfFrontProcess = false;
  522.                         }
  523.                     }
  524.                     break;
  525.  
  526.                 case kHighLevelEvent:
  527.                     AEProcessAppleEvent(&theEvent);
  528.                     break;
  529.             }
  530.         }
  531.     }
  532.     else
  533.     {
  534.         if (gfFrontProcess)
  535.             DoUpdate ();
  536.     }
  537. }
  538.  
  539. // --------------------------------------------------------------------------
  540.  
  541. void CleanUp (void)
  542. {
  543.     MenuHandle hMenu;
  544.  
  545.     DeleteFontGL (gFontList);
  546.     DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  547.  
  548.     if (gpWindowError)
  549.     {
  550.         DisposeWindow ((WindowPtr)gpWindowError);
  551.         gpWindowError = NULL;
  552.     }
  553.  
  554.     hMenu = GetMenuHandle (kMenuFile);
  555.     DeleteMenu (kMenuFile);
  556.     DisposeMenu (hMenu);
  557.  
  558.     hMenu = GetMenuHandle (kMenuApple);
  559.     DeleteMenu (kMenuApple);
  560.     DisposeMenu (hMenu);
  561. }
  562.  
  563. // --------------------------------------------------------------------------
  564.  
  565. int main (void)
  566. {
  567.     if (SetUp ())    
  568.         while (!gDone) 
  569.             DoEvent ();
  570.     CleanUp ();
  571.     return 0;
  572. }
  573.  
  574.  
  575. #pragma mark -
  576. //-----------------------------------------------------------------------------------------------------------------------
  577.  
  578. // OpenGL Drawing
  579.  
  580. void drawGL(AGLContext aglContext, pstructGLInfo pglInfo)
  581. {
  582.     static float f, s, c;
  583.     GLboolean fState = GL_FALSE;
  584.  
  585.     f += 0.01;
  586.     s = sin(f);
  587.     c = cos(f);
  588.  
  589.     glClearColor(0.15f, 0.15f, 0.15f, 1.0f);                    // Clear color buffer to dark grey
  590.     glClear(GL_COLOR_BUFFER_BIT);
  591.     
  592.     glBegin(GL_POLYGON);                                        // Draw a smooth shaded polygon
  593.     glColor3d(1.0, 0.0, 0.0);
  594.     glVertex3d(s, c, 0.0);
  595.     glColor3d(0.0, 1.0, 0.0);
  596.     glVertex3d(-c, s, 0.0);
  597.     glColor3d(0.0, 0.0, 1.0);
  598.     glVertex3d(-s, -c, 0.0);
  599.     glColor3d(0.7, 0.7, 0.7);
  600.     glVertex3d(c, -s, 0.0);
  601.     glEnd();
  602.  
  603.     // Draw frame rate (set color and position first)
  604.     glColor3d(1.0, 1.0, 1.0);
  605.     glRasterPos3d (-0.95, (pglInfo->height - 40.0) / (float) pglInfo->height, 0.0); 
  606.     DrawFrameRate (gFontList);
  607.     glRasterPos3d (-0.95, (pglInfo->height - 65.0) / (float) pglInfo->height, 0.0); 
  608.     DrawContextInfo (gFontList);
  609.  
  610.     glRasterPos3d (-0.95, -(pglInfo->height - 45.0) / (float) pglInfo->height, 0.0); 
  611.     DrawCSringGL ((char*) glGetString (GL_VENDOR), gFontList);
  612.     glRasterPos3d (-0.95, -(pglInfo->height - 20.0) / (float) pglInfo->height, 0.0); 
  613.     DrawCSringGL ((char*) glGetString (GL_RENDERER), gFontList);
  614.  
  615.     aglSwapBuffers(aglContext);                                        // send swap command
  616. }
  617.  
  618. //-----------------------------------------------------------------------------------------------------------------------
  619.  
  620. // Draw frame rate in curent color at current raster positon with provided font display list
  621.  
  622. void DrawFrameRate (GLuint fontList)
  623. {    
  624.     static char aChar[256] = "";
  625.     static AbsoluteTime time = {0,0};
  626.     static long frames = 0;
  627.  
  628.     AbsoluteTime currTime = UpTime ();
  629.     float deltaTime = (float) AbsoluteDeltaToDuration (currTime, time);
  630.     
  631.     frames++;
  632.  
  633.     if (0 > deltaTime)    // if negative microseconds
  634.         deltaTime /= -1000000.0;
  635.     else                // else milliseconds
  636.         deltaTime /= 1000.0;
  637.     if (0.5 <= deltaTime)    // has update interval passed
  638.     {
  639.         sprintf (aChar, "Swaps/Sec: %0.1f", frames / deltaTime);
  640.         time = currTime;    // reset for next time interval
  641.         frames = 0;
  642.     }
  643.     
  644.     DrawCSringGL (aChar, fontList);
  645. }
  646.  
  647. //-----------------------------------------------------------------------------------------------------------------------
  648.  
  649. // Draw height,width, bit pixel and frequency for context
  650.  
  651. void DrawContextInfo (GLuint fontList)
  652. {    
  653.     DrawCSringGL (gstrMode, fontList);
  654. }
  655.  
  656. #pragma mark -
  657. //-----------------------------------------------------------------------------------------------------------------------
  658.  
  659. void DrawPSringGL (Str255 pstrOut, GLuint fontList)
  660. {
  661.     GLint i;
  662.     for (i = 1; i <= pstrOut[0]; i++)
  663.         glCallList (fontList + pstrOut[i]);
  664. }
  665.  
  666. //-----------------------------------------------------------------------------------------------------------------------
  667.  
  668. void DrawCSringGL (char * cstrOut, GLuint fontList)
  669. {
  670.     GLint i = 0;
  671.     while (cstrOut [i])
  672.         glCallList (fontList + cstrOut[i++]);
  673. }
  674.  
  675. //-----------------------------------------------------------------------------------------------------------------------
  676.  
  677. GLuint BuildFontGL (AGLContext ctx, GLint fontID, Style face, GLint size)
  678. {
  679.     GLuint listBase = glGenLists (256);
  680.     if (aglUseFont (ctx, fontID , face, size, 0, 256, (long) listBase))
  681.     {
  682.         glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
  683.         return listBase;
  684.     }
  685.     else
  686.     {
  687.         glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
  688.         glDeleteLists (listBase, 256);
  689.         return 0;
  690.     }
  691. }
  692.  
  693. //-----------------------------------------------------------------------------------------------------------------------
  694.  
  695. void DeleteFontGL (GLuint fontList)
  696. {
  697.     if (fontList)
  698.         glDeleteLists (fontList, 256);
  699. }